home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-01 / snip0493.zip / FASKBHIT.C < prev    next >
Text File  |  1993-04-05  |  311b  |  22 lines
  1. /*
  2. **  by David Goodenough & Bob Stout
  3. */
  4.  
  5. #ifdef __TURBOC__
  6.  #define FAR far
  7. #else
  8.  #define FAR _far
  9. #endif
  10.  
  11. static int FAR * const bios = (int FAR *) 0x00400000l;
  12.  
  13. int fast_kbhit(void)
  14. {
  15.       return(bios[0x1a] - bios[0x1c]);
  16. }
  17.  
  18. void fast_kbflush(void)
  19. {
  20.       bios[0x1a] = bios[0x1c];
  21. }
  22.